(import gui.*)
(deftemplate Qualities (declare (from-class Qualities)))
(deftemplate QualitiesPriorities (declare (from-class QualitiesPriorities)))
(defglobal ?*cont* = 0)


(defrule skill-priority-comunication1
    (Qualities {comunication > 70})
    (QualitiesPriorities {quality1 == "comunication"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-computation-knowledge1
    (Qualities {computation_knowledge  > 70})
    (QualitiesPriorities {quality1 == "computation_knowledge"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-solving-problems1
    (Qualities {solving_problems  > 70})
    (QualitiesPriorities {quality1 == "solving_problems"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-interpersonal-habilities1
    (Qualities {interpersonal_habilities  > 70})
    (QualitiesPriorities {quality1 == "interpersonal_habilities"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-pririty-group-habilities1
    (Qualities {group_habilities  > 70})
    (QualitiesPriorities {quality1 == "group_habilities"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-diversity1
    (Qualities {diversity  > 70})
    (QualitiesPriorities {quality1 == "diversity"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-planning1
    (Qualities {planning  > 70})
    (QualitiesPriorities {quality1 == "planning"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-leadership1
    (Qualities {leadership  > 70})
    (QualitiesPriorities {quality1 == "leadership"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-flexibility1
    (Qualities {flexibility  > 70})
    (QualitiesPriorities {quality1 == "flexibility"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-professionalism1
    (Qualities {professionalism  > 70})
    (QualitiesPriorities {quality1 == "professionalism"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-possitive-actitude1
    (Qualities {possitive_actitude  > 70})
    (QualitiesPriorities {quality1 == "possitive_actitude"})  
    =>
    (add (+ 100 ?*cont*)))


(defrule skill-priority-comunication2
    (Qualities {comunication > 70})
    (QualitiesPriorities {quality2 == "comunication"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-computation-knowledge2
    (Qualities {computation_knowledge  > 70})
    (QualitiesPriorities {quality2 == "computation_knowledge"})  
    =>
    (add (+ 110 ?*cont*)))

(defrule skill-priority-solving-problems2
    (Qualities {solving_problems  > 70})
    (QualitiesPriorities {quality2 == "solving_problems"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-interpersonal-habilities2
    (Qualities {interpersonal_habilities  > 70})
    (QualitiesPriorities {quality2 == "interpersonal_habilities"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-pririty-group-habilities2
    (Qualities {group_habilities  > 70})
    (QualitiesPriorities {quality2 == "group_habilities"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-diversity2
    (Qualities {diversity  > 70})
    (QualitiesPriorities {quality2 == "diversity"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-planning2
    (Qualities {planning  > 70})
    (QualitiesPriorities {quality2 == "planning"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-leadership2
    (Qualities {leadership  > 70})
    (QualitiesPriorities {quality2 == "leadership"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-flexibility2
    (Qualities {flexibility  > 70})
    (QualitiesPriorities {quality2 == "flexibility"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-professionalism2
    (Qualities {professionalism  > 70})
    (QualitiesPriorities {quality2 == "professionalism"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-possitive-actitude2
    (Qualities {possitive_actitude  > 70})
    (QualitiesPriorities {quality2 == "possitive_actitude"})  
    =>
    (add (+ 100 ?*cont*)))



(defrule skill-priority-comunication3
    (Qualities {comunication > 70})
    (QualitiesPriorities {quality3 == "comunication"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-computation-knowledge3
    (Qualities {computation_knowledge  > 70})
    (QualitiesPriorities {quality3 == "computation_knowledge"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-solving-problems3
    (Qualities {solving_problems  > 70})
    (QualitiesPriorities {quality3 == "solving_problems"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-interpersonal-habilities3
    (Qualities {interpersonal_habilities  > 70})
    (QualitiesPriorities {quality3 == "interpersonal_habilities"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-pririty-group-habilities3
    (Qualities {group_habilities  > 70})
    (QualitiesPriorities {quality3 == "group_habilities"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-diversity3
    (Qualities {diversity  > 70})
    (QualitiesPriorities {quality3 == "diversity"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-planning3
    (Qualities {planning  > 70})
    (QualitiesPriorities {quality3 == "planning"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-leadership3
    (Qualities {leadership  > 70})
    (QualitiesPriorities {quality3 == "leadership"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-flexibility3
    (Qualities {flexibility  > 70})
    (QualitiesPriorities {quality3 == "flexibility"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-professionalism3
    (Qualities {professionalism  > 70})
    (QualitiesPriorities {quality3 == "professionalism"})  
    =>
    (add (+ 100 ?*cont*)))

(defrule skill-priority-possitive-actitude3
    (Qualities {possitive_actitude  > 70})
    (QualitiesPriorities {quality3 == "possitive_actitude"})  
    =>
    (add (+ 100 ?*cont*)))



(defrule skill-comunication
    ?person <- (Qualities {comunication > 70})
    =>
    (add (+ 10 ?*cont*)))

(defrule skill-computation-knowledge
    ?person <- (Qualities {computation_knowledge > 70})
    =>
    (add (+ 20 ?*cont*)))
  

(defrule skill-solving-problems
    ?person <- (Qualities {solving_problems > 70})
    =>
	(add (+ 30 ?*cont*)))

(defrule skill-interpersonal-habilities
    ?person <- (Qualities {interpersonal_habilities > 70})
    =>
	(add (+ 40 ?*cont*)))

(defrule skill-group-habilities
    ?person <- (Qualities {group_habilities > 70})
    =>
	(add (+ 50 ?*cont*)))

(defrule skill-diversity
    ?person <- (Qualities {diversity > 70})
    =>
	(add (+ 60 ?*cont*)))

(defrule skill-planning
    ?person <- (Qualities {planning > 70})
    =>
	(add (+ 70 ?*cont*)))

(defrule skill-leadership
    ?person <- (Qualities {leadership > 70})
    =>
	(add (+ 80 ?*cont*)))

(defrule skill-flexibility
    ?person <- (Qualities {flexibility > 70})
    =>
	(add (+ 90 ?*cont*)))

(defrule skill-professionalism
    ?person <- (Qualities {professionalism > 70})
    =>
	(add (+ 100 ?*cont*)))

(defrule skill-possitive-actitude
    ?person <- (Qualities {possitive_actitude > 70})
    =>
	(add (+ 100 ?*cont*)))


(agenda)